--macro setCursor if rollOver(10) then cursor 151 eraseCastCursor(15, 16) else if rollOver(11) then placeCastCursor(16, "goExit") eraseCastCursor(15, 15) else cursor 128 eraseCastCursor(15, 16) end ifmacro placeCastCursor spNum, cursorName cursor 200 put the mouseH into cursorH put the mouseV into cursorV puppetSprite spNum, TRUE set the type of sprite spNum = 1 set the ink of sprite spNum = 0 if mouseDown() then set the castNum of sprite spNum = the number of cast (cursorName & "Down") else set the castNum of sprite spNum = the number of cast cursorName end if set the locH of sprite spNum = cursorH set the locV of sprite spNum = cursorV updateStagemacro eraseCastCursor spNum1, spNum2 puppetSprite spNum1, FALSE puppetSprite spNum2, FALSEmacro eraseCastAll cursor 200 repeat with n = 1 to 24 puppetSprite n, FALSE end repeat
Script Channel Commands
--------------------
unload "gate3", "gate3End"preload "doorOpen", "doorOpenEnd"unload "gate", "gateEnd"preload "gate2", "gate2End"puppetSound "ENT01sound"unLoad "doorOpen", "doorOpenEnd"setCursorgo to the framepreLoad "gate", "gateEnd"initcursor 129go to movie "inside"delay 30puppetSound 0puppetTransition 23play donecursor 128go to the frameif soundBusy(1) then go to the frameunload "gate2", "gate2End"preload "gate3", "gate3End"cursor 200delay 20delay 60
vwci
----
1025:
窶冢ﾂ坂\凪\禿･窶堙.1
1026:
窶冢ﾂ坂\凪\禿･窶堙.3
1027:
窶冢ﾂ坂\凪\禿･窶堙.5
1028:
窶冢ﾂ坂\凪\禿･窶堙.6
1029:
窶冢ﾂ坂\凪\禿･窶堙.7
1031:
窶敕 ﾅ J2/19.1
1032:
窶敕 ﾅ J2/19.3
1033: on mouseUp puppetSound 0 eraseCastAll go to marker(1)end mouseUp□Door
1034: on mouseUp eraseCastAll puppetTransition 23 play "quit"end mouseUp
